home *** CD-ROM | disk | FTP | other *** search
/ Night Owl 19 / Night Owl (The Best of Shareware)(NOPV 19)(1996).ISO / 007a / sfnetfs.zip / SAMPLE.BAT < prev    next >
DOS Batch File  |  1995-12-09  |  5KB  |  174 lines
  1. Here is What A Typical Batch File Would look like when you call The
  2. international Hub.
  3.  
  4. @ECHO OFF
  5. C:
  6. :BACKUP
  7.  CD\SFNET
  8.  IF EXIST A0000000.QWK MUV A0000000.QWK C:\SFNET\HOLD
  9.  CD\SFNET\HOLD
  10.  REM Keep 5 runs worth of QWKs
  11.  IF EXIST *.QW5 DEL *.QW5
  12.  IF EXIST *.QW4 REN *.QW4 *.QW5
  13.  IF EXIST *.QW3 REN *.QW3 *.QW4
  14.  IF EXIST *.QW2 REN *.QW2 *.QW3
  15.  IF EXIST *.QW1 REN *.QW1 *.QW2
  16.  IF EXIST *.QWK REN *.QWK *.QW1
  17.  GOTO EXPORT
  18. :EXPORT
  19.  CD\SFNET
  20.  IF EXIST A0000000.REP GOTO CALL
  21.  SHILOEXP A0000000
  22.  GOTO CALL
  23. :CALL
  24.  CD\TELIX
  25.  TELIX Q SGETNET.SLC
  26.  GOTO IMPORT
  27. :IMPORT
  28.  BFCOM 2 OFF
  29.  CD\SFNET
  30.  SHILOIMP A0000000.QWK
  31.  FROMINTL  <- In comes FROMINTL.EXE
  32. :END
  33.  
  34. Here is What a batch file might look like, for your nodes to use when
  35. calling in and using the Menu Extension routine:
  36.  
  37. @Echo Off
  38. :LOOP
  39.    C:
  40.    CD\SF
  41.    SFMNUEXT
  42.    IF ERRORLEVEL 48 GOTO EXTEND_Z
  43.    IF ERRORLEVEL 46 GOTO EXTEND_Y
  44.    IF ERRORLEVEL 44 GOTO EXTEND_X
  45.    IF ERRORLEVEL 42 GOTO EXTEND_W
  46.    IF ERRORLEVEL 40 GOTO EXTEND_V
  47.    IF ERRORLEVEL 38 GOTO EXTEND_U
  48.    IF ERRORLEVEL 36 GOTO EXTEND_T
  49.    IF ERRORLEVEL 34 GOTO EXTEND_S
  50.    IF ERRORLEVEL 32 GOTO EXTEND_R
  51.    IF ERRORLEVEL 30 GOTO EXTEND_P
  52.    IF ERRORLEVEL 28 GOTO EXTEND_O
  53.    IF ERRORLEVEL 26 GOTO EXTEND_N
  54.    IF ERRORLEVEL 24 GOTO EXTEND_M
  55.    IF ERRORLEVEL 22 GOTO EXTEND_L
  56.    IF ERRORLEVEL 20 GOTO EXTEND_K
  57.    IF ERRORLEVEL 18 GOTO EXTEND_J
  58.    IF ERRORLEVEL 16 GOTO EXTEND_I
  59.    IF ERRORLEVEL 14 GOTO EXTEND_H
  60.    IF ERRORLEVEL 12 GOTO EXTEND_F
  61.    IF ERRORLEVEL 10 GOTO EXTEND_E
  62.    IF ERRORLEVEL 8 GOTO EXTEND_D
  63.    IF ERRORLEVEL 6 GOTO EXTEND_C
  64.    IF ERRORLEVEL 4 GOTO EXTEND_B
  65.    IF ERRORLEVEL 2 GOTO EXTEND_A
  66.    IF ERRORLEVEL 1 GOTO LOOP
  67.    IF ERRORLEVEL 0 GOTO END
  68. :EXTEND_A
  69.    COPY SFDOORS.DAT C:\SFNET
  70.    C:
  71.    CD\SFNET
  72.    IF EXIST A0803000.QWK DEL A0803000.QWK
  73.    SFMSGLMR /GET
  74.    SHILOEXP
  75.    TONODES <- In Comes TONODES.EXE
  76.    DSZ 2 sz A0803000.QWK
  77.    IF ERRORLEVEL 1 GOTO RESET
  78.    GOTO DEL_LM
  79. :RESET
  80.    SFMSGLMR /SET
  81.    GOTO DEL_LM
  82. :DEL_LM
  83.    IF EXIST *.LM DEL *.LM
  84.    IF EXIST A0803000.QWK DEL A0803000.QWK
  85.    DELAY 3.0
  86.    IF EXIST SFDOORS.DAT DEL SFDOORS.DAT
  87.    CD\SF
  88.    GOTO LOOP
  89. :EXTEND_B
  90.    COPY SFDOORS.DAT C:\SFNET
  91.    C:
  92.    CD\SFNET
  93.    IF EXIST A0803000.REP DEL A0803000.REP
  94.    DSZ 2 restrict rz
  95.    IF EXIST A0803000.REP GOTO DOIMPORT
  96.    IF EXIST SFDOORS.DAT DEL SFDOORS.DAT
  97.    DELAY 3.0
  98.    CD\SF
  99.    GOTO LOOP
  100. :DOIMPORT
  101.    SHILOIMP A0803000.REP
  102.    DELAY 3.0
  103.    DEL A0803000.REP
  104.    IF EXIST SFDOORS.DAT DEL SFDOORS.DAT
  105.    CD\SF
  106.    REM Place EXTENSION B Commands Here
  107.    GOTO LOOP
  108. :END
  109. C:
  110. CD\SF
  111.  
  112. Here is what MY PRESCAN.BAT Looks Like:
  113.  
  114. @ECHO OFF
  115. CD\SFNET
  116. REM *********************************************************************
  117. REM *A0803021 Is Don McWhirter Voice Phone: 904-268-3242,FIDO=1:112/100 *
  118. REM *A0803022 Is Charlie Smith Voice Phone: 317-856-3441,FIDO=1:2230/110*
  119. REM *A0803023 Is Alex Gen Voice Phone: 708-776-1341,FIDO=1:2235/185     *
  120. REM *A0803024 Is Mike Weaver Voice Phone: 205-232-5082,FIDO=1:3670/3    *
  121. REM *NOTE: Alex Does not want Backup,Mike Gets Crash                    *
  122. REM *********************************************************************
  123. REM
  124. REM Lets Prescan A0803021 First!
  125. CD\SFNET\A0803021
  126. IF EXIST A0803021.QWK GOTO STOP21
  127. CD\SFNET
  128. SHILOEXP /PRE=A0803021
  129. REN A0803000.QWK A0803021.QWK
  130. TONODES A0803021
  131. MUV A0803021.QWK C:\SFNET\A0803021
  132. CD\FD
  133. XRDOS SEND /FC:\SFNET\A0803021\A0803021.* /R1:112/100 /MH+C-E+
  134. :STOP21
  135. REM*********************************************************************
  136. REM Lets Prescan A0803022 Now!
  137. CD\SFNET\A0803022
  138. IF EXIST A0803022.QWK GOTO STOP22
  139. CD\SFNET
  140. SHILOEXP /PRE=A0803022
  141. REN A0803000.QWK A0803022.QWK
  142. TONODES A0803022
  143. MUV A0803022.QWK C:\SFNET\A0803022
  144. CD\FD
  145. XRDOS SEND /FC:\SFNET\A0803022\A0803022.* /R1:2230/110 /MH+C-E+
  146. :STOP22
  147. REM*********************************************************************
  148. REM Lets Prescan A0803023 Now!
  149. CD\SFNET\A0803023
  150. IF EXIST A0803023.QWK GOTO STOP23
  151. CD\SFNET
  152. SHILOEXP /PRE=A0803023
  153. REN A0803000.QWK A0803023.QWK
  154. TONODES A0803023
  155. MUV A0803023.QWK C:\SFNET\A0803023
  156. CD\FD
  157. XRDOS SEND /FC:\SFNET\A0803023\A0803023.QWK /R1:2235/185 /MH+C-E+
  158. :STOP23
  159. REM*********************************************************************
  160. REM Lets Prescan A0803024 Now!
  161. CD\SFNET\A0803024
  162. IF EXIST A0803024.QWK GOTO STOP24
  163. CD\SFNET
  164. SHILOEXP /PRE=A0803024
  165. REN A0803000.QWK A0803024.QWK
  166. TONODES A0803024
  167. MUV A0803024.QWK C:\SFNET\A0803024
  168. CD\FD
  169. XRDOS SEND /FC:\SFNET\A0803024\A0803024.QWK /R1:3670/3 /MC+E+
  170. :STOP24
  171.  
  172. Have Fun!!
  173.  
  174.